object HrFrm: THrFrm Left = 200 Top = 99 ActiveControl = Edit1 BorderIcons = [biSystemMenu, biHelp] BorderStyle = bsSingle ClientHeight = 333 ClientWidth = 388 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'System' Font.Style = [] OldCreateOrder = True Position = poScreenCenter OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 16 object Panel1: TPanel Left = 0 Top = 0 Width = 388 Height = 333 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered Ctl3D = True ParentCtl3D = False TabOrder = 0 object Label2: TLabel Left = 12 Top = 12 Width = 3 Height = 13 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clNavy Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False end object Button1: TButton Left = 144 Top = 301 Width = 72 Height = 22 HelpContext = 49 Default = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = Button1Click end object Button2: TButton Left = 224 Top = 301 Width = 72 Height = 22 HelpContext = 44 Cancel = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 4 OnClick = Button2Click end object RadioGroup1: TRadioGroup Left = 12 Top = 252 Width = 364 Height = 37 HelpContext = 19 Columns = 3 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = RadioGroup1Click end object CheckBox2: TCheckBox Left = 12 Top = 138 Width = 364 Height = 17 HelpContext = 121 Checked = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False State = cbChecked TabOrder = 0 OnClick = CheckBox2Click end object GroupBox1: TGroupBox Left = 12 Top = 158 Width = 364 Height = 89 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 object Label4: TLabel Left = 12 Top = 57 Width = 3 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label6: TLabel Left = 134 Top = 57 Width = 3 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Label7: TLabel Left = 12 Top = 27 Width = 3 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Exp1: TImage Left = 188 Top = 28 Width = 12 Height = 12 AutoSize = True end object Label3: TLabel Left = 202 Top = 28 Width = 3 Height = 13 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object Edit1: TEdit Left = 76 Top = 24 Width = 38 Height = 21 HelpContext = 176 AutoSize = False Ctl3D = True Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 4 ParentCtl3D = False ParentFont = False TabOrder = 0 Text = '100' OnChange = Edit1Change end object Edit2: TEdit Left = 76 Top = 54 Width = 38 Height = 21 HelpContext = 247 AutoSize = False Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] MaxLength = 2 ParentFont = False TabOrder = 1 Text = '2' OnChange = Edit2Change end object UpDown1: TUpDown Left = 114 Top = 24 Width = 15 Height = 21 HelpContext = 176 Associate = Edit1 Min = 0 Position = 100 TabOrder = 2 Wrap = False end object UpDown2: TUpDown Left = 114 Top = 54 Width = 15 Height = 21 HelpContext = 247 Associate = Edit2 Min = 1 Max = 10 Position = 2 TabOrder = 3 Wrap = False end object LargeurCheck: TCheckBox Left = 134 Top = 29 Width = 31 Height = 13 HelpContext = 228 Caption = '%' Checked = True State = cbChecked TabOrder = 4 OnClick = LargeurCheckClick end object ColorButton1: TWin95ColorButton Left = 310 Top = 23 Width = 40 Height = 22 HelpContext = 76 Color = clBlack ButtonCaption = '&More...' OnColorChange = ColorButton1ColorChange OnDblClick = ColorButton1DblClick end end object BitBtn1: TBitBtn Left = 304 Top = 301 Width = 72 Height = 22 HelpContext = 7 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 5 OnClick = Button3Click end object EsquisseBox: TGroupBox Left = 12 Top = 36 Width = 364 Height = 89 HelpContext = 140 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentColor = False ParentFont = False TabOrder = 6 object Panel2: TPanel Left = 10 Top = 18 Width = 346 Height = 61 HelpContext = 140 BevelOuter = bvNone BorderStyle = bsSingle TabOrder = 0 object Panel3: TPanel Left = 0 Top = 28 Width = 343 Height = 3 BevelOuter = bvLowered Color = clBlack Ctl3D = True ParentCtl3D = False TabOrder = 0 end end end end end